home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
system
/
pc_dcl.zip
/
RFILE.DCL
< prev
next >
Wrap
Text File
|
1991-11-11
|
227b
|
11 lines
set verify
open /read/error=ferror /length=10 infile toto.dat
!open /read/error=ferror infile toto.dat
loop:
read infile record /end=ferror /error=ferror
write SYS$OUTPUT record
goto loop
close infile
ferror:
exit